; Reglas que recomienda segun el uso de los modelos
;Regla que recomienda los de videojuegos

(defrule videojuegos
	(preferencias(grupo ?tipo))
	(test (or (eq ?tipo "n")(eq ?tipo "Videojuegos")))
	=>
	(assert (modelo_aconsejado (modelo domestico:G61-410ss)))
	(assert (modelo_aconsejado (modelo domestico:G61-430ss)))
	(assert (modelo_aconsejado (modelo pavilion:dv7-3090es)))
	(assert (modelo_aconsejado (modelo pavilion:dv8-1100)))
)


;Regla que recomienda los netbook

(defrule netbooks
	(preferencias(grupo ?tipo))
	(test (or (eq ?tipo "n")(eq ?tipo "Netbook")))
	=>
	(assert (modelo_aconsejado (modelo Netbook:210-1010ss)))
	(assert (modelo_aconsejado (modelo Netbook:210-1020ss)))
	(assert (modelo_aconsejado (modelo Netbook:210-1085es)))
	(assert (modelo_aconsejado (modelo Netbook:110-1150ss)))
	(assert (modelo_aconsejado (modelo Netbook:110-1170es)))
)

;Regla que recomienda los multimedia

(defrule multimedia
	(preferencias(grupo ?tipo))
	(test (or (eq ?tipo "n")(eq ?tipo "Multimedia")))
	=>
	(assert (modelo_aconsejado (modelo Pavilion:dm1-1110ss)))
	(assert (modelo_aconsejado (modelo Pavilion:dm3-1170es)))
	(assert (modelo_aconsejado (modelo Pavilion:dm6-2020es)))
	(assert (modelo_aconsejado (modelo Domestico:G62-110ss)))
	(assert (modelo_aconsejado (modelo Domestico:G61-410ss)))
	(assert (modelo_aconsejado (modelo TouchSmart:tx2-1350es)))
	(assert (modelo_aconsejado (modelo Envy:15-1150es)))
)

;Regla que recomienda para desarrolladores

(defrule desarrolladores
	(preferencias(grupo ?tipo))
	(test (or (eq ?tipo "n")(eq ?tipo "Desarrollo")))
	=>
	(assert (modelo_aconsejado (modelo Envy:15-1050es)))
	(assert (modelo_aconsejado (modelo Envy:15-1150es)))
	(assert (modelo_aconsejado (modelo Pavilion:dv7-3090es)))
	(assert (modelo_aconsejado (modelo Pavilion:dv8-1100)))
	(assert (modelo_aconsejado (modelo Domestico:G62-110SS)))
	(assert (modelo_aconsejado (modelo Domestico:G61-430ss)))
)